Workplace Effectiveness: Critical Thinking Skills/Workplace Effectiveness: Critical Thinking Skills.iso/pc/Files/Clue.dxr/00004_Clue handlers.ls

Text File | 1998-09-17 | 576 b | 28 lines

global gSection, gClueData

on nextOne
  if the questionNum of gClueData < 21 then
    go(marker(1))
    set the questionNum of gClueData to the questionNum of gClueData + 1
    if the questionNum of gClueData = 2 then
      audio1xOnly(gMasterData, "59")
    end if
  else
    goScore()
  end if
end

on previousOne
  if the questionNum of gClueData > 1 then
    go(marker(-1))
    set the questionNum of gClueData to the questionNum of gClueData - 1
  else
    case gSection of
      #questions:
        goIntro()
      #answers:
        goScore()
    end case
  end if
end